home *** CD-ROM | disk | FTP | other *** search
/ Aminet 33 / Aminet 33 - October 1999.iso / Aminet / util / cli / VersCheck.lha / VersCheck / Goodies / Check_Your_System < prev    next >
Encoding:
Text File  |  1999-08-31  |  4.6 KB  |  157 lines
  1. ; $VER: VersCheck-Select-Script V1.1 (27.08.1999) by Michaela Pruess
  2.  
  3. Echo "Running Script"
  4. IF NOT EXISTS SCRIPTS
  5.     IF EXISTS /SCRIPTS
  6.         PATH "" ADD
  7.         CD /
  8.     ELSE
  9.         IF EXISTS C:SCRIPTS
  10.             PATH "" ADD
  11.             CD C:
  12.         ELSE
  13.             Echo "Can't find scripts, aborting..."
  14.             END
  15.         ENDIF
  16.     ENDIF
  17. ENDIF
  18.  
  19. STACK 250000
  20.  
  21. RTSimpleReq TITLE "Check your System" TEXT "Start VersCheck for" CENTER BUTTON "_ALL|_Libs|_Devs|D_Types|_MUI|_Handler|_Classes|_QUIT" >ENV:VCREQ1
  22.  
  23. IF $VCREQ1 EQ "1"
  24.     ECHO "Y" >ENV:VCREQ0
  25.     ECHO "2" >ENV:VCREQ1
  26.     ECHO "1" >ENV:VCREQ2
  27. ELSE
  28.     ECHO "N" >ENV:VCREQ0
  29. ENDIF
  30.  
  31. IF $VCREQ1 EQ "2"
  32.     IF $VCREQ0 EQ "N"
  33.         RTSimpleReq TITLE "Check Library's" TEXT "Select path to check" CENTER BUTTON "_Libs:|File_Requester|No Chec_K" >ENV:VCREQ2
  34.     ENDIF
  35.     IF $VCREQ2 EQ "1"
  36.         VersCheck -1fnmosvx
  37.     ENDIF
  38.     IF $VCREQ2 EQ "2"
  39.         RTFileReq TITLE "Library path" DRAWER Libs: NOFILES >ENV:VCREQ3
  40.         VersCheck -1fnmosvx "$VCREQ3"
  41.     ENDIF
  42. ENDIF
  43.  
  44. IF $VCREQ0 EQ "Y"
  45.     ECHO "3" >ENV:VCREQ1
  46. ENDIF
  47.  
  48. IF $VCREQ1 EQ "3"
  49.     IF $VCREQ0 EQ "N"
  50.         RTSimpleReq TITLE "Check Devices" TEXT "Select path to check" CENTER BUTTON "_Devs:|File_Requester|No Chec_K" >ENV:VCREQ2
  51.     ENDIF
  52.     IF $VCREQ2 EQ "1"
  53.         VersCheck -2fnmosvx
  54.     ENDIF
  55.     IF $VCREQ2 EQ "2"
  56.         RTFileReq TITLE "Device path" DRAWER Devs: NOFILES >ENV:VCREQ3
  57.         VersCheck -2fnmosvx "$VCREQ3"
  58.     ENDIF
  59. ENDIF
  60.  
  61. IF $VCREQ0 EQ "Y"
  62.     ECHO "4" >ENV:VCREQ1
  63. ENDIF
  64.  
  65. IF $VCREQ1 EQ "4"
  66.     IF $VCREQ0 EQ "N"
  67.         RTSimpleReq TITLE "Check Datatypes" TEXT "Select path to check" CENTER BUTTON "_Sys:Classes/Datatypes|File_Requester|No Chec_K" >ENV:VCREQ2
  68.     ENDIF
  69.     IF $VCREQ2 EQ "1"
  70.         VersCheck -3fnmosvx
  71.     ENDIF
  72.     IF $VCREQ2 EQ "2"
  73.         RTFileReq TITLE "Datatypes path" DRAWER Sys:Classes/Datatypes NOFILES >ENV:VCREQ3
  74.         VersCheck -3fnmosvx "$VCREQ3"
  75.     ENDIF
  76. ENDIF
  77.  
  78. IF $VCREQ0 EQ "Y"
  79.     ECHO "5" >ENV:VCREQ1
  80. ENDIF
  81.  
  82. IF $VCREQ1 EQ "5"
  83.     IF $VCREQ0 EQ "N"
  84.         RTSimpleReq TITLE "Check MUI" TEXT "Select path to check" CENTER BUTTON "_MUI:Libs/MUI|File_Requester|No Chec_K" >ENV:VCREQ2
  85.     ENDIF
  86.     IF $VCREQ2 EQ "1"
  87.         VersCheck -4fnmsvx
  88.     ENDIF
  89.     IF $VCREQ2 EQ "2"
  90.         RTFileReq TITLE "MUI path" DRAWER MUI:Libs/MUI NOFILES >ENV:VCREQ3
  91.         VersCheck -4fnmsvx "$VCREQ3"
  92.     ENDIF
  93. ENDIF
  94.  
  95. IF $VCREQ0 EQ "Y"
  96.     ECHO "6" >ENV:VCREQ1
  97. ENDIF
  98.  
  99. IF $VCREQ1 EQ "6"
  100.     IF $VCREQ0 EQ "N"
  101.         RTSimpleReq TITLE "Check Handler" TEXT "Select path to check" CENTER BUTTON "_l:|File_Requester|No Chec_K" >ENV:VCREQ2
  102.     ENDIF
  103.     IF $VCREQ2 EQ "1"
  104.         VersCheck -5fnmsvx
  105.     ENDIF
  106.     IF $VCREQ2 EQ "2"
  107.         RTFileReq TITLE "Handler path" DRAWER l: NOFILES >ENV:VCREQ3
  108.         VersCheck -5fnmsvx "$VCREQ3"
  109.     ENDIF
  110. ENDIF
  111.  
  112. IF $VCREQ0 EQ "Y"
  113.     ECHO "7" >ENV:VCREQ1
  114. ENDIF
  115.  
  116. IF $VCREQ1 EQ "7"
  117.     IF $VCREQ0 EQ "N"
  118.         RTSimpleReq TITLE "Check Classes" TEXT "Select path to check" CENTER BUTTON "Sys:_Classes+MUI:|_Sys:Classes|_MUI:|File_Requester|No Chec_K" >ENV:VCREQ2
  119.     ENDIF
  120.     IF $VCREQ2 EQ "1"
  121.         VersCheck -afnmsv -0s .class -0l ClassList -0n CLASS MUI:
  122.         VersCheck -afnmv -0s .class -0l ClassList -0n CLASS Sys:Classes
  123.         VersCheck -afnmsv -0s .image -0l ImageList -0n CLASSIMG MUI:
  124.         VersCheck -afnmv -0s .image -0l ImageList -0n CLASSIMG Sys:Classes
  125.         VersCheck -afnmsv -0s .gadget -0l GadgetList -0n CLASSGAD MUI:
  126.         VersCheck -afnmv -0s .gadget -0l GadgetList -0n CLASSGAD Sys:Classes
  127.         VersCheck -afnmsv -0s .codec -0l CodecList -0n CLASSCOD MUI:
  128.         VersCheck -afnmv -0s .codec -0l CodecList -0n CLASSCOD Sys:Classes
  129.         VersCheck -afnmsv -0s .decoder -0l DecoderList -0n CLASSDEC MUI:
  130.         VersCheck -afnmv -0s .decoder -0l DecoderList -0n CLASSDEC Sys:Classes
  131.     ENDIF
  132.     IF $VCREQ2 EQ "2"
  133.         VersCheck -afnmsv -0s .class -0l ClassList -0n CLASS Sys:Classes
  134.         VersCheck -afnmsv -0s .image -0l ImageList -0n CLASSIMG Sys:Classes
  135.         VersCheck -afnmsv -0s .gadget -0l GadgetList -0n CLASSGAD Sys:Classes
  136.         VersCheck -afnmsv -0s .codec -0l CodecList -0n CLASSCOD Sys:Classes
  137.         VersCheck -afnmsv -0s .decoder -0l DecoderList -0n CLASSDEC Sys:Classes
  138.     ENDIF
  139.     IF $VCREQ2 EQ "3"
  140.         VersCheck -afnmsv -0s .class -0l ClassList -0n CLASS MUI:
  141.         VersCheck -afnmsv -0s .image -0l ImageList -0n CLASSIMG MUI:
  142.         VersCheck -afnmsv -0s .gadget -0l GadgetList -0n CLASSGAD MUI:
  143.         VersCheck -afnmsv -0s .codec -0l CodecList -0n CLASSCOD MUI:
  144.         VersCheck -afnmsv -0s .decoder -0l DecoderList -0n CLASSDEC MUI:
  145.     ENDIF
  146.     IF $VCREQ2 EQ "4"
  147.         RTFileReq TITLE "Handler path" DRAWER Sys:Classes NOFILES >ENV:VCREQ3
  148.         VersCheck -afnmsv -0s .class -0l ClassList -0n CLASS "$VCREQ3"
  149.         VersCheck -afnmsv -0s .image -0l ImageList -0n CLASSIMG "$VCREQ3"
  150.         VersCheck -afnmsv -0s .gadget -0l GadgetList -0n CLASSGAD "$VCREQ3"
  151.         VersCheck -afnmsv -0s .codec -0l CodecList -0n CLASSCOD "$VCREQ3"
  152.         VersCheck -afnmsv -0s .decoder -0l DecoderList -0n CLASSDEC "$VCREQ3"
  153.     ENDIF
  154. ENDIF
  155. Delete ENV:VCREQ? >NIL:
  156. RTSimpleReq TITLE "END" TEXT "Check your RAM-Disk for results" CENTER BUTTON "_OK" >NIL:
  157.